﻿CREATE PROC [sacm].[spRegistraDoctor]
	@psNombre			VARCHAR(200),
	@psApellidoPaterno	VARCHAR(200),
	@psApellidoMaterno	VARCHAR(200),
	@psCedulaProfesional VARCHAR(50),
	@psRFC				VARCHAR(20),
	@psDomicilioFiscal	VARCHAR(8000),
	@psTelefono			VARCHAR(30),
	@psIpMod			VARCHAR(15),
	@pnIdUsuarioMod		INT,
	@pnIdDoctor			INT,
	@pnIdEmpresa		INT,
	@pnIdSucursal		INT
AS
BEGIN
	IF @pnIdDoctor IS NULL
	BEGIN
		INSERT INTO sacm.CatDoctor
				( IdEmpresa ,
				  IdSucursal ,
				  ApellidoPaterno ,
				  ApellidoMaterno ,
				  Nombre ,
				  CedulaProfesional ,
				  RFC ,
				  DomicilioFiscal ,
				  Telefono ,
				  FechaMod ,
				  IpMod ,
				  IdUsuarioMod
				)
		VALUES  ( @pnIdEmpresa , -- IdEmpresa - int
				  @pnIdSucursal , -- IdSucursal - int
				  @psApellidoPaterno , -- ApellidoPaterno - nvarchar(250)
				  @psApellidoMaterno , -- ApellidoMaterno - nvarchar(250)
				  @psNombre , -- Nombre - nvarchar(250)
				  @psCedulaProfesional , -- CedulaProfesional - varchar(50)
				  @psRFC , -- RFC - varchar(20)
				  @psDomicilioFiscal , -- DomicilioFiscal - varchar(8000)
				  @psTelefono , -- Telefono - varchar(30)
				  GETDATE() , -- FechaMod - datetime
				  @psIpMod , -- IpMod - varchar(15)
				  @pnIdUsuarioMod  -- IdUsuarioMod - int
				)
				
		SET @pnIdDoctor = @@IDENTITY--IDENT_CURRENT()
	END
	ELSE
	BEGIN
		UPDATE	d
		SET		ApellidoPaterno		= @psApellidoPaterno,
				ApellidoMaterno		= @psApellidoMaterno,
				Nombre				= @psNombre,
				CedulaProfesional	= @psCedulaProfesional,
				RFC					= @psRFC,
				DomicilioFiscal		= @psDomicilioFiscal,
				Telefono			= @psTelefono,
				FechaMod			= GETDATE(),
				IpMod				= @psIpMod,
				IdUsuarioMod		= @pnIdUsuarioMod
		FROM	sacm.CatDoctor		d
		WHERE	IdEmpresa			= @pnIdEmpresa
		AND		IdSucursal			= @pnIdSucursal
		AND		IdDoctor			= @pnIdDoctor
	END
	
	SELECT	@pnIdDoctor AS IdDoctor
END